home *** CD-ROM | disk | FTP | other *** search
/ PC Accelerator 10 / HOMEWRLD.bin / BEHAV.CXT / 00010_Script_ScollingGraphics Vertical behaviour < prev    next >
Text File  |  1999-03-23  |  443b  |  15 lines
  1. --this behavior gets attached to a graphic that will scroll.
  2. --works in conjuction with the ArrowButton Ver behaviour
  3.  
  4. on  move me, whatDirection , whatDistance
  5.   --called from the "ArrowButton Ver"
  6.   --what direction is a symbol (#up or #Down)
  7.   if whatDirection = #Up then set whatDistance = whatDistance *-1
  8.   
  9.   set the locV of sprite the CurrentSpriteNum to¼
  10.  the locV of Sprite The currentSpriteNUm + whatDistance
  11.   
  12. end
  13.  
  14.  
  15.